﻿Public Class MenuInfo
    Public Sub New(Text As String, ImagePath As String, Command As Command)
        Me.Text = Text
        Me.Command = Command
        Me.ImagePath = ImagePath
        'If Not String.IsNullOrEmpty(ImagePath) Then
        '    Image = New BitmapImage
        '    Image.BeginInit()
        '    Image.UriSource = New Uri("pack://application:,,," & ImagePath, UriKind.RelativeOrAbsolute)
        '    Image.EndInit()
        'Else
        '    Image = Nothing
        'End If
    End Sub

    Public Property Text As String
    Public Property ImagePath As String
    Public Property Command As ICommand
End Class
